QReport - OnPrint
Otázka od: Martin Kasman
12. 9. 2002 1:33
D6, WinXP
Pri QReport mam dost zlozity vystup, tak ho zachytavam cez OnPrint a az
potom ho poslem vytlacit. Pri Preview to funguje - aj pri Print to funguje -
ale ked dam Preview a pri tom stlacim na tlacitko Print, tak uz sa mi
nezachyty OnPrint a nevytlaci sa to spravne. (tlacim s databazy Paradox)
Vdaka za kazdu radu.
Odpovedá: Roman
12. 9. 2002 6:29
> D6, WinXP
>
> Pri QReport mam dost zlozity vystup, tak ho zachytavam cez OnPrint a az
> potom ho poslem vytlacit. Pri Preview to funguje - aj pri Print to
funguje -
> ale ked dam Preview a pri tom stlacim na tlacitko Print, tak uz sa mi
> nezachyty OnPrint a nevytlaci sa to spravne. (tlacim s databazy Paradox)
Nevim co v tom OnPrint vsechno delas, ale podobne situace jsem resil vzdycky
v udalostech Before/After u jednotlivych Bandu.
Roman
==============================
http://kouzelne.misto.cz
Odpovedá: Martin Kasman
12. 9. 2002 22:20
V udalostech Before/After u jednotlivych Bandu by to asi neslo, pretoze
vsetky QRDBText sa vytvaraju az v programe podla poziadaviek uzivatela.
Napriklad:
procedure TTlacivoJ.NazovCasopisuPrint(sender: TObject; var Value: String);
var GrizlyIni: TIniFile;
begin
GrizlyIni:=TIniFile.Create('Grizly.ini');
Value:=GrizlyIni.ReadString('nastavenia-časopis','názov
'+Stg(Vll(StgDbl(Table1CASOPIS.Value))),
'periodikum
'+Stg(Vll(StgDbl(Table1Casopis.Value))));
GrizlyIni.Free;
end;
----- Original Message -----
From: "Roman" <sw.maurice@seznam.cz>
> > D6, WinXP
> >
> > Pri QReport mam dost zlozity vystup, tak ho zachytavam cez OnPrint a az
> > potom ho poslem vytlacit. Pri Preview to funguje - aj pri Print to
> funguje -
> > ale ked dam Preview a pri tom stlacim na tlacitko Print, tak uz sa mi
> > nezachyty OnPrint a nevytlaci sa to spravne. (tlacim s databazy Paradox)
>
> Nevim co v tom OnPrint vsechno delas, ale podobne situace jsem resil
vzdycky
> v udalostech Before/After u jednotlivych Bandu.
>
> Roman
> ==============================
> http://kouzelne.misto.cz
>
>
Odpovedá: Roman
13. 9. 2002 12:24
> V udalostech Before/After u jednotlivych Bandu by to asi neslo, pretoze
> vsetky QRDBText sa vytvaraju az v programe podla poziadaviek uzivatela.
> Napriklad:
>
> procedure TTlacivoJ.NazovCasopisuPrint(sender: TObject; var Value:
String);
> var GrizlyIni: TIniFile;
> begin
> GrizlyIni:=TIniFile.Create('Grizly.ini');
>
Value:=GrizlyIni.ReadString('nastavenia-časopis','názov
> '+Stg(Vll(StgDbl(Table1CASOPIS.Value))),
'periodikum
> '+Stg(Vll(StgDbl(Table1Casopis.Value))));
> GrizlyIni.Free;
> end;
No a? Za 1. kdyz se to plni rucne, tak bych nepouzival DBText ale Label. Za
2. nevim, proc by to nemelo jit v BeforePrint.
Roman
==============================
http://kouzelne.misto.cz